home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
TPUG - Toronto PET Users Group
/
TPUG Users Group CD
/
TPUG Users Group CD.iso
/
COMAL
/
B-Book Series
/
(k)b2.d64
/
help-graphics
< prev
next >
Wrap
Text File
|
2007-02-28
|
2KB
|
81 lines
╚╔╟╚ ╥┼╙ & ╘╒╥╘╠┼ GRAPHICS (├╧═┴╠ 0.14)
┬┴├╦ -- MOVE TURTLE BACKWARDS
┬┴├╦ <LENGTH>
┬┴├╦╟╥╧╒╬─ -SET SCREEN BACKGROUND COLOR
┬┴├╦╟╥╧╒╬─ <COLOR NUMBER>
┬╧╥─┼╥ -- SET THE SCREEN BORDER COLOR
┬╧╥─┼╥ <COLOR NUMBER>
├╠┼┴╥ -- CLEAR THE GRAPHICS SCREEN
├╠┼┴╥
─╥┴╫╘╧ -- DRAW LINE FROM CURRENT POINT
─╥┴╫╘╧ <X COORDINATE>,<Y COORDINATE>
╞╔╠╠ -- FILL IN AREA WITH CURRENT COLOR
╞╔╠╠ <X COORDINATE>,<Y COORDINATE>
╞╧╥╫┴╥─ -- MOVE TURTLE FORWARD
╞╧╥╫┴╥─ <LENGTH>
╞╥┴═┼ -- SET UP A SCREEN WINDOW
╞╥┴═┼ <X0>,<X1>,<Y0>,<Y1>
╞╒╠╠╙├╥┼┼╬ -- FULLSCREEN GRAPHICS (F5)
╞╒╠╠╙├╥┼┼╬
╚╔─┼╘╒╥╘╠┼ -- MAKE THE TURTLE INVISIBLE
╚╔─┼╘╒╥╘╠┼
╚╧═┼ -- PUT TURTLE IN ITS HOME POSITION
╚╧═┼
╠┼╞╘ -- TURN TURTLE LEFT
╠┼╞╘ <DEGREES>
═╧╓┼╘╧ -MOVE TO X,Y POINT WITHOUT LINE
═╧╓┼╘╧ <X COORDINATE>,<Y COORDINATE>
╨┼╬├╧╠╧╥ -- SET CURRENT PEN COLOR
╨┼╬├╧╠╧╥ <COLOR NUMBER>
╨┼╬─╧╫╬ -PUT PEN DOWN-TURTLE DRAWS LINE
╨┼╬─╧╫╬
╨┼╬╒╨ -PICK UP PEN-TURTLE DOESN'T DRAW
╨┼╬╒╨
╨╠╧╘ -- PLOT A POINT IN CURRENT COLOR
╨╠╧╘ <X COORDINATE>,<Y COORDINATE>
╨╠╧╘╘┼╪╘ -PRINT TEXT ON GRAPHICS SCREEN
╨╠╧╘╘┼╪╘ <X COORD>,<Y COORD>,<TEXT$>
╥╔╟╚╘ -- TURN TURTLE RIGHT
╥╔╟╚╘ <DEGREES>
╙┼╘╟╥┴╨╚╔├ -- TURN ON GRAPHICS SCREEN
╙┼╘╟╥┴╨╚╔├ █<TYPE>▌
╙┼╘╚┼┴─╔╬╟ -- SET TURTLE HEADING
╙┼╘╚┼┴─╔╬╟ <DEGREE>
╙┼╘╘┼╪╘ -- TURN ON TEXT SCREEN (F1)
╙┼╘╘┼╪╘
╙┼╘╪┘ -- SET TURTLE X AND Y COORDINATES
╙┼╘╪┘ <X COORDINATE>,<Y COORDINATE>
╙╚╧╫╘╒╥╘╠┼ -- MAKE TURTLE VISIBLE
╙╚╧╫╘╒╥╘╠┼
╙╨╠╔╘╙├╥┼┼╬ -2 TEXT LINES ABOVE GRAPHIC
╙╨╠╔╘╙├╥┼┼╬
╘╒╥╘╠┼╙╔┌┼ -- SET TURTLE SIZE (0 TO 10)
╘╒╥╘╠┼╙╔┌┼ <SIZE>